This forum is closed to new posts and
responses. Individual names altered for privacy purposes. The information contained in this website is provided for informational purposes only and should not be construed as a forum for customer support requests. Any customer support requests should be directed to the official HCL customer support channels below:
Creates a PDF using the window title as the file name and attaches it to a mail document which is displayed to the user.
Looks like the code has been modified over ther years and area and nextStatus are no longer used.
You have to have Adobe PDF installed as a printer
Printing Preferences
Adobe PDF Settings tab
Uncheck View Adobe PDF results
Action on a form
Sub Click(Source As Button)
Call NotifyFLS(doc, "", "")
End Sub
Script Library
Sub NotifyFLS (doc As NotesDocument, area As Variant, nextStatus As String)
On Error Goto errTrap
Dim uidoc As NotesUIDocument
Dim mailFile As Variant
Dim mailDb As NotesDatabase
Dim mailDoc As NotesDocument
Dim body As NotesRichTextItem
Dim isMailDb As Boolean
Dim reportSubject As String
Dim reportFile As String
Dim x As Variant